log a page break when start compiling

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index a0ff122362648ed44f10b3fab21c92f34f10c0bb..fe3c1dde93e08f34f31a22a43786a3ebf805a3c3 100644 (file)
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -1690,6 +1690,7 @@ If INPUT is a string, use it as the file path to be native compiled."
                     :output (if (symbolp input)
                                 (symbol-name input)
                               (file-name-sans-extension (expand-file-name input))))))
+    (comp-log "\n\f\n")
     (mapc (lambda (pass)
             (comp-log (format "Running pass %s:\n" pass))
             (setq data (funcall pass data)))